﻿#include "SList.h"

void SLTPrint(SLTNode** pphead)//与其他的函数保持一致,可以是SLTNode* phead
{
	assert(pphead);
	SLTNode* cur = *pphead;
	while (cur)
	{
		printf("%d->", cur->data);//->的优先级高于*因此需要括号
		cur = cur->next;
	} 
	printf("NULL\n");
}

SLTNode* BuyNewnode(SLTDataType x)
{
	SLTNode* newnode = (SLTNode*)malloc(sizeof(SLTNode));
	if (newnode == NULL)
	{
		perror("malloc fail!\n");
		assert(0);
	}
	newnode->data = x;
	newnode->next = NULL;
	return newnode;
}

//头部插⼊删除/尾部插⼊删除
void SLTPushBack(SLTNode** pphead, SLTDataType x)
{
	assert(pphead);
	//创建新的节点
	SLTNode* newnode = BuyNewnode(x);

	//进行尾插
	//无节点
	if (*pphead == NULL)
	{
		*pphead = newnode;
		return;
	}
	else
	{
		//有节点找尾节点
		SLTNode* ptail = *pphead;
		while (ptail->next)
		{
			ptail = ptail->next;
		}
		ptail->next = newnode;
	}
}
void SLTPushFront(SLTNode** pphead, SLTDataType x)
{
	assert(pphead);
	//创建新的节点
	SLTNode* newnode = BuyNewnode(x);
	//进行头插
	newnode->next = *pphead;
	*pphead = newnode;
}

void SLTPopBack(SLTNode** pphead)
{
	assert(pphead);
	assert(*pphead);//不能删除空链表
	if ((*pphead)->next == NULL)//一个节点
	{
		free(*pphead);
		*pphead = NULL;
	}
	else
	{
		//找前驱结点
		SLTNode* prev = *pphead;
		while (prev->next->next)//多个节点
		{
			prev = prev->next;
		}
		free(prev->next);
		prev->next = NULL;
	}
	
}

void SLTPopFront(SLTNode** pphead)
{
	assert(pphead);
	assert(*pphead);//不能为空

	SLTNode* pcur = *pphead;
	*pphead = (*pphead)->next;
	free(pcur);
	pcur = NULL;
}


//查找
SLTNode* SLTFind(SLTNode** pphead, SLTDataType x)
{
	assert(pphead);
	assert(*pphead);//链表不为空
	//值查找
	SLTNode* pcur = *pphead;
	while (pcur)
	{
		if (pcur->data == x)
		{
			return pcur;
		}
		pcur = pcur->next;
	}

	return NULL;
}


//在指定位置之前插⼊数据
void SLTInsert(SLTNode** pphead, SLTNode* pos, SLTDataType x)
{
	assert(pphead);
	//创建新的节点
	SLTNode* newnode = BuyNewnode(x);
	//查找是否有该位置
	if (pos == NULL)
	{
		printf("没有该值\n");
		assert(pos);
	}
	else
	{
		if (*pphead == pos)//如果是头节点就头插(一个节点)
		{
			SLTPushFront(pphead, x);
			return;
		}
		else
		{
			//pos位置之前插入数据
			SLTNode* prev = *pphead;
			while (prev->next != pos)
			{
				prev = prev->next;
			}
			newnode->next = pos;
			prev->next = newnode;
		}
	}
}

//删除pos节点
void SLTErase(SLTNode** pphead, SLTNode* pos)
{
	assert(pphead);
	assert(*pphead);//链表不能为空
	//检查是否有该节点
	if (pos == NULL)
	{
		printf("没有该值\n");
		assert(pos);
	}
	else
	{
		//只有一个节点
		if (*pphead == pos)
		{
			SLTPopFront(pphead);
			return;
		}
		else
		{
			//找前驱节点
			SLTNode* prev = *pphead;
			while (prev->next != pos)
			{
				prev = prev->next;
			}
			//前驱节点指向pos位置的后一个节点
			prev->next = pos->next;
			free(pos);
			pos = NULL;
		}
	}

}

//在指定位置之后插⼊数据
void SLTInsertAfter(SLTNode* pos, SLTDataType x)
{
	if(pos==NULL)
	{
		printf("没有该值\n");
		assert(pos);
	}
	//创建新的节点
	SLTNode* newnode = BuyNewnode(x);
	//pos位置之后插入数据
	newnode->next = pos->next;
	pos->next = newnode;
	
}

//删除pos之后的节点
void SLTEraseAfter(SLTNode* pos)
{
	assert(pos);
	assert(pos->next);//当pos是头节点时且只有一个节点时不成立，当pos是尾节点也不成立
	//pos  pos->next  pos->next->next
	SLTNode* del = pos->next;
	pos->next = pos->next->next;
	
	free(del);
	del = NULL;
}

//销毁链表
void SListDesTroy(SLTNode** pphead)
{
	assert(pphead);
	assert(*pphead);

	SLTNode* pcur = *pphead;
	while (pcur)
	{
		SLTNode* next = pcur->next;//保存下个节点防止找不到
		free(pcur);
		pcur = next;
	}
	*pphead = NULL;
	pcur = NULL;
}